-- background: 9276 from stack: in
-- bmap block id: 15969
-- flags: 0000
-- background id: 0
-- name: Main
----- HyperTalk script -----
on Opencard
  set the scroll of background field "text1" to 0
  set the scroll of background field "text2" to 0
end openCard

on lockit
  set the locktext of background field "text1" to "true"
  set the locktext of background field "text2" to "true"
end lockit

on unlockit
  set the locktext of background field "text1" to "False"
  set the locktext of background field "text2" to "False"
end unlockit



-- part 2 (field)
-- low flags: 01
-- high flags: 0007
-- rect: left=120 top=4 right=225 bottom=507
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 14
-- text size: 12
-- style flags: 0
-- line height: 17
-- part name: Text2
----- HyperTalk script -----
on mouseUp
  global FrontField
  put "FS" into FrontField

  set lockscreen to true
  set the scroll of background field "text1" to 0
  set the scroll of background field "text2" to 0
  hide background field "text2"
  show background field "text1"
  hide card button "OK"
  unlock screen with visual effect dissolve
end mouseUp



-- part 1 (field)
-- low flags: 81
-- high flags: 0007
-- rect: left=120 top=4 right=225 bottom=507
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 14
-- text size: 12
-- style flags: 0
-- line height: 17
-- part name: Text1
----- HyperTalk script -----
on mouseUp
  global FrontField
  put "OV" into FrontField


  set the scroll of background field "text1" to 0
  set the scroll of background field "text2" to 0
  -- hide background field "text1"
  put empty into bg field "text2"
  -- show background field "text2"
  hide card button "OK"

end mouseUp



-- part 6 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=35 top=91 right=120 bottom=80
-- title width / last selected line: 0
-- icon id / first selected line: 2442 / 2442
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  set lockscreen to true
  global FrontField
  put "OV" into FrontField
  unlock screen with visual effect dissolve


  hide background field "Text1"
  put empty into bg field "Text2"
  put "This will take you to the Help Screen, where you are now." into bg field "Text2"
  show background field "Text2"
  show card button "OK"

end mouseUp



-- part 8 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=290 top=300 right=329 bottom=335
-- title width / last selected line: 0
-- icon id / first selected line: 30557 / 30557
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  global FrontField
  put "OV" into FrontField

  set lockscreen to true
  hide background field "Text1"
  show background field "Text2"
  go to card "covercard"
  unlock screen with visual effect scroll right
end mouseUp



-- part 9 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=425 top=300 right=329 bottom=469
-- title width / last selected line: 0
-- icon id / first selected line: 9632 / 9632
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  answer "Quit to Home or Finder?" with "Cancel" or "Home" or "Finder"
  if it = "Cancel"
  then
  exit mouseUp
end if

if it = "Home"
then
visual effect iris open
domenu home
else
  show menubar
  doMenu "Quit HyperCard"
end if
end mouseUp